﻿Namespace QuanLyKhachHang
    Public Class DanhMucKhachHangBLL
        Public Function DanhMucKhachHang_GetItems(ByVal TenKhachHang As String, ByVal MaTinhThanh As Integer) As List(Of KhachHang)
            Try
                Dim doit As New DanhMucKhachHangDAL
                Return doit.DanhMucKhachHang_GetItems(TenKhachHang, MaTinhThanh)
            Catch ex As Exception
                Throw ex
            End Try
        End Function
        Public Function DanhMucKhachHang_GetItems_ToDataTable(ByVal TenKhachHang As String, ByVal MaTinhThanh As Integer) As DataTable
            Try
                Dim doit As New DanhMucKhachHangDAL
                Return doit.DanhMucKhachHang_GetItems_ToDataTable(TenKhachHang, MaTinhThanh)
            Catch ex As Exception
                Throw ex
            End Try
        End Function

    End Class
End Namespace
